--CREATE DATABASE
USE [master]
GO
DECLARE @database	VARCHAR(50);
SET @database = 'Chilis';
IF EXISTS(SELECT [name] FROM sys.databases WHERE [name] =@database)
BEGIN
	EXEC msdb.dbo.sp_delete_database_backuphistory @database_name = @database
	--CERRAR TODAS LAS CONEXIONES
	EXEC('ALTER DATABASE ['+ @database + '] SET  SINGLE_USER WITH ROLLBACK IMMEDIATE');
	--DROP DATABASE
	EXEC('DROP DATABASE [' + @database + ']');
END;
EXEC ('CREATE DATABASE [' + @database + ']');
GO
---------------------------------------------------------------
USE[Chilis]
GO
--MAESTRO DE PROCESOS
CREATE TABLE [dbo].[TB_PROCESO]
(
	[IDPROCESO] [char](5) NOT NULL,
	[NOMBRE] [varchar](50) NOT NULL,
	[DESCRIPCION] [varchar](150) SPARSE  NULL,
	[LIDER] [varchar](150) SPARSE  NULL,
	CONSTRAINT [PK_PROCESO] PRIMARY KEY CLUSTERED ([IDPROCESO] ASC)
)
GO
--MAESTRO DE AREAS
CREATE TABLE [dbo].[TB_AREA]
(
	[IDAREA] [char](4) NOT NULL,
	[NOMBRE] [varchar](50) NOT NULL,
	CONSTRAINT [PK_AREA] PRIMARY KEY CLUSTERED ([IDAREA] ASC)
) 
GO
--MAESTRO DE AREAS X PROCESO, VALIDA QUE EL AREA ESTE VINCULADO CON EL PROCESO
CREATE TABLE [dbo].[TB_AREA_PROCESO](
	[IDAREA] [char](4) NOT NULL,
	[IDPROCESO] [char](5) NOT NULL,
	CONSTRAINT [PK_AREA_PROCESO] PRIMARY KEY CLUSTERED ([IDPROCESO] ASC, [IDAREA] ASC),
	CONSTRAINT [FK_AREA_PROCESO_AREA] FOREIGN KEY ([IDAREA]) REFERENCES TB_AREA([IDAREA]),
	CONSTRAINT [FK_AREA_PROCESO_PROCESO] FOREIGN KEY ([IDPROCESO]) REFERENCES TB_PROCESO([IDPROCESO]),
) ON [PRIMARY]
GO
--MAESTRO DE PROCEDIMIENTOS
CREATE TABLE [dbo].[TB_PROCEDIMIENTO]
(
	[IDPROCEDIMIENTO] [char](10) NOT NULL,
	[IDPROCESO] [char](5) NOT NULL,
	[NOMBRE] [varchar](80) NOT NULL,
	CONSTRAINT [PK_PROCEDIMIENTO] PRIMARY KEY CLUSTERED ([IDPROCEDIMIENTO] ASC),
	CONSTRAINT [FK_PROCEDIMIENTO_PROCESO] FOREIGN KEY ([IDPROCESO]) REFERENCES TB_PROCESO([IDPROCESO])
)
GO
--MAESTRO DE CHECKLIST
CREATE TABLE [dbo].[TB_CHECKLIST]
(
	[IDCHECKLIST] [char](10) NOT NULL,
	[DESCRIPCION] [varchar](200) NOT NULL,
	CONSTRAINT [PK_CHECKLIST] PRIMARY KEY CLUSTERED ([IDCHECKLIST] ASC)
)
GO
--MAESTRO DE PROCEDIMIENTO CHECKLIST, VALIDA QUE LE PROCEDIMIENTO ESTA VINCULADO AL CHECKLIST
CREATE TABLE [dbo].[TB_PROCEDIMIENTO_CHECKLIST]
(
	[IDPROCEDIMIENTO] [char](10) NOT NULL,
	[IDCHECKLIST] [char](10) NOT NULL,
	[VALOR_ESPERADO] [char](30) NOT NULL,
	CONSTRAINT [PK_CHECKLIST_PROCEDIMIENTO] PRIMARY KEY CLUSTERED ([IDPROCEDIMIENTO] ASC,[IDCHECKLIST] ASC),
	CONSTRAINT [FK_CHECKLIST_PROCEDIMIENTO_PROCEDIMIENTO] FOREIGN KEY ([IDPROCEDIMIENTO]) REFERENCES TB_PROCEDIMIENTO([IDPROCEDIMIENTO]),
	CONSTRAINT [FK_CHECKLIST_PROCEDIMIENTO_CHECKLIST] FOREIGN KEY ([IDCHECKLIST]) REFERENCES TB_CHECKLIST([IDCHECKLIST])
)
GO
--MAESTRO DE EMPLEADOS
CREATE TABLE [dbo].[TB_EMPLEADO]
(
	[IDEMPLEADO] [char](8) NOT NULL,
	[NOMBRE] [varchar](100) NOT NULL,
	[TIPO] [char](1) NOT NULL,
  CONSTRAINT [PK_EMPLEADO] PRIMARY KEY CLUSTERED ([IDEMPLEADO] ASC)
)
GO
--TRANSACCIONALES
-----------
CREATE TABLE [dbo].[TB_PLAN_AUDITORIA]
(
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,
	[VERSION] [varchar](3) NOT NULL,
	[FECHA] [date] NOT NULL,
	[ALCANCE] [varchar](150) SPARSE  NULL,
	[OBJETIVO] [varchar](150) SPARSE  NULL,
	[AUDITADO] [bit] NOT NULL,
	[IDPROCESO] [char](5) NOT NULL,
  CONSTRAINT [PK_PLAN_AUDITORIA] PRIMARY KEY CLUSTERED([IDPLAN_AUDITORIA] ASC),
	CONSTRAINT [FK_PROCESO_PLAN_AUDITORIA] FOREIGN KEY ([IDPROCESO]) REFERENCES TB_PROCESO([IDPROCESO])
)
GO
CREATE TABLE [dbo].[TB_PLAN_AUDITOR]
(
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,
	[IDEMPLEADO] [char](8) NOT NULL,
	[LIDER] [bit] NULL,
	[FECHA] [date] NULL,
	CONSTRAINT [PK_PLAN_AUDITOR] PRIMARY KEY CLUSTERED ([IDPLAN_AUDITORIA] ASC,	[IDEMPLEADO] ASC),
	CONSTRAINT [FK_PLAN_AUDITORIA_AUDITOR] FOREIGN KEY ([IDPLAN_AUDITORIA]) REFERENCES TB_PLAN_AUDITORIA([IDPLAN_AUDITORIA]),
	CONSTRAINT [FK_EMPLEADO_AUDITOR] FOREIGN KEY ([IDEMPLEADO]) REFERENCES TB_EMPLEADO([IDEMPLEADO])
)
GO
CREATE TABLE [dbo].[TB_PLAN_AREA]
(
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,	
	[IDAREA] [char](4) NOT NULL, 
	[IDPROCESO] [char](5) NOT NULL,
	CONSTRAINT [PK_PLAN_AREA] PRIMARY KEY CLUSTERED ([IDPLAN_AUDITORIA] ASC,[IDAREA] ASC),
	CONSTRAINT [FK_PLAN_PLAN_AREA] FOREIGN KEY ([IDPLAN_AUDITORIA]) REFERENCES TB_PLAN_AUDITORIA([IDPLAN_AUDITORIA]),
	CONSTRAINT [FK_AREA_PROCESO_PLAN_AREA] FOREIGN KEY ([IDPROCESO],[IDAREA]) REFERENCES TB_AREA_PROCESO([IDPROCESO],[IDAREA])	
)
GO
CREATE TABLE [dbo].[TB_PLAN_PROCEDIMIENTO]
(
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,	
	[IDPROCEDIMIENTO] [char](10) NOT NULL
	CONSTRAINT [PK_PLAN_PROCEDIMIENTO] PRIMARY KEY CLUSTERED ([IDPLAN_AUDITORIA] ASC,[IDPROCEDIMIENTO] ASC),
	CONSTRAINT [FK_PLAN_PLAN_PROCEDIMIENTO] FOREIGN KEY ([IDPLAN_AUDITORIA]) REFERENCES TB_PLAN_AUDITORIA([IDPLAN_AUDITORIA]),
	CONSTRAINT [FK_PROCEDIMIENTO_PLAN_PROCEDIMIENTO] FOREIGN KEY ([IDPROCEDIMIENTO]) REFERENCES TB_PROCEDIMIENTO([IDPROCEDIMIENTO])
)
GO
CREATE TABLE [dbo].[TB_DETALLE_PLAN_AUDITORIA]
(
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,
	[IDPROCEDIMIENTO] [char](10) NOT NULL,
	[IDCHECKLIST] [char](10) NOT NULL,	
	[FECHA_AUDITORIA] [datetime] NOT NULL,
	[OBSERVACION] [varchar](150) SPARSE  NULL,
	[VALOR_MEDIDO] [char](30) NOT NULL,
	CONSTRAINT [PK_DETALLE_PLAN_AUDITORIA] PRIMARY KEY CLUSTERED ([IDPROCEDIMIENTO] ASC,[IDCHECKLIST] ASC,[IDPLAN_AUDITORIA] ASC),
	CONSTRAINT [FK_DETELLA_PLAN_PLAN_AUDITORIA] FOREIGN KEY ([IDPROCEDIMIENTO],[IDCHECKLIST]) REFERENCES [TB_PROCEDIMIENTO_CHECKLIST]([IDPROCEDIMIENTO],[IDCHECKLIST])
)
GO
CREATE TABLE [dbo].[TB_INFORME_AUDITORIA]
(
	[IDINFORME_AUDITORIA] [char](6) NOT NULL,
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,
	[OBJETIVO] [varchar](400) NOT NULL,
	[FECHA_INFORME] [date] NOT NULL,
	[OBSERVACION] [varchar](400) SPARSE  NULL,
	[RECOMENDACION] [varchar](400) SPARSE  NULL,
	[SITUACION_INFORME] [char](2) NOT NULL,
	[FECHA_APROBACION] [date] SPARSE NULL,
	CONSTRAINT [PK_INFORME_AUDITORIA] PRIMARY KEY CLUSTERED ([IDINFORME_AUDITORIA] ASC),
	CONSTRAINT [FK_INFORME_AUDITORIA_PLAN] FOREIGN KEY ([IDPLAN_AUDITORIA]) REFERENCES TB_PLAN_AUDITORIA([IDPLAN_AUDITORIA])
)
GO
CREATE TABLE [dbo].[TB_RECLAMO]
(
	[IDRECLAMO] [char](8) NOT NULL,
	[DESCRIPCION] [varchar](150) NOT NULL
	CONSTRAINT [PK_RECLAMO] PRIMARY KEY CLUSTERED ([IDRECLAMO] ASC)
) 
GO
CREATE TABLE [dbo].[TB_OPORTUNIDAD_MEJORA]
(
	[IDOPORTUNIDAD_MEJORA] [char](6) NOT NULL,
	[FECHA] [date] NOT NULL,
	[OBSERVACION] [varchar](150) SPARSE  NULL,
	[IDINFORME_AUDITORIA] [char](6) NULL,
	[IDRECLAMO] [char](8) NULL,
	CONSTRAINT [PK_OPORTUNIDAD_MEJORA] PRIMARY KEY CLUSTERED([IDOPORTUNIDAD_MEJORA] ASC),
	CONSTRAINT [FK_INFORME_AUDITORIA_OPORTUNIDAD] FOREIGN KEY ([IDINFORME_AUDITORIA]) REFERENCES TB_INFORME_AUDITORIA([IDINFORME_AUDITORIA]),
	CONSTRAINT [FK_RECLAMO_OPORTUNIDAD] FOREIGN KEY ([IDRECLAMO]) REFERENCES TB_RECLAMO([IDRECLAMO])
)
GO
CREATE TABLE [dbo].[TB_NO_CONFORMIDAD]
(
	[IDPROCEDIMIENTO] [char](10) NOT NULL,
	[IDCHECKLIST] [char](10) NOT NULL,
	[IDPLAN_AUDITORIA] [char](6) NOT NULL,
	[CONFORMIDAD] [bit] NOT NULL,
	[CANTIDAD] [smallint] NOT NULL,
	CONSTRAINT [PK_NO_CONFORMIDAD] PRIMARY KEY CLUSTERED ([IDPROCEDIMIENTO] ASC,[IDCHECKLIST] ASC,[IDPLAN_AUDITORIA] ASC),
	CONSTRAINT [FK_NO_CONFORMIDAD_PROCEDIMIENTO_CHECKLIST] FOREIGN KEY ([IDPROCEDIMIENTO],[IDCHECKLIST]) REFERENCES TB_PROCEDIMIENTO_CHECKLIST([IDPROCEDIMIENTO],[IDCHECKLIST]),
	CONSTRAINT [FK_NO_CONFORMIDAD_PLAN_AUDITORIA] FOREIGN KEY ([IDPLAN_AUDITORIA]) REFERENCES TB_PLAN_AUDITORIA([IDPLAN_AUDITORIA])
)
GO
CREATE TABLE [dbo].[TB_SOLICITUD_CAMBIO]
(
	[IDSOLICITUD_CAMBIO] [char](10) NOT NULL,
	[FECHA_CREACION] [date] NOT NULL,
	[OBSERVACIONES] [varchar](400) SPARSE  NULL,
	[ESTADO] [char](1) NOT NULL,
	[PRIORIDAD] [char](1) NOT NULL,
	[IMPACTO] [char](1) NOT NULL,
	[FECHA_APROBACION] [date] SPARSE  NULL,
	[IDOPORTUNIDAD_MEJORA] [char](6) NOT NULL,
	[IDPROCESO] [char](5) NOT NULL,
	[SOLICITANTE] [varchar](150) NOT NULL,
	[SOLICITANTE_DESC] [varchar](400) NOT NULL,
	CONSTRAINT [PK_SOLICITUD_CAMBIO] PRIMARY KEY CLUSTERED ([IDSOLICITUD_CAMBIO] ASC),
	CONSTRAINT [FK_OPORTUNIDAD_MEJORA] FOREIGN KEY ([IDOPORTUNIDAD_MEJORA]) REFERENCES TB_OPORTUNIDAD_MEJORA([IDOPORTUNIDAD_MEJORA]),
	CONSTRAINT [FK_OPORTUNIDAD_MEJORA_PROCESO] FOREIGN KEY ([IDPROCESO]) REFERENCES TB_PROCESO([IDPROCESO])
)
GO
SELECT * FROM sys.tables
GO

--stores de pedro  11-07-2013

GO

CREATE PROC UPDATE_PLAN_AUDITOR
@PLAN CHAR(6),
@EMP CHAR(8),
@LIDER BIT,
@ACC BIT
AS
	IF ( @ACC = 1 )
		BEGIN
			IF EXISTS ( SELECT * FROM TB_PLAN_AUDITOR WHERE IDEMPLEADO = @EMP AND IDPLAN_AUDITORIA = @PLAN )
				UPDATE TB_PLAN_AUDITOR SET LIDER = @LIDER, FECHA = GETDATE()
				WHERE IDEMPLEADO = @EMP AND IDPLAN_AUDITORIA = @PLAN
			ELSE
				INSERT INTO TB_PLAN_AUDITOR VALUES (@PLAN, @EMP, @LIDER, GETDATE())
		END
	ELSE
		DELETE FROM TB_PLAN_AUDITOR WHERE IDEMPLEADO = @EMP AND IDPLAN_AUDITORIA = @PLAN	
GO

SET QUOTED_IDENTIFIER OFF
GO

CREATE PROC LISTAR_CHECKLIST_PROC
@PROCEDIMIENTO VARCHAR(100)
AS
EXEC('
SELECT CP.IDPROCEDIMIENTO, VALOR_ESPERADO, P.NOMBRE, C.IDCHECKLIST, C.DESCRIPCION 
FROM TB_PROCEDIMIENTO_CHECKLIST CP
INNER JOIN TB_PROCEDIMIENTO P ON (P.IDPROCEDIMIENTO = CP.IDPROCEDIMIENTO)
INNER JOIN TB_CHECKLIST C ON (C.IDCHECKLIST = CP.IDCHECKLIST)
WHERE CP.IDPROCEDIMIENTO IN (' + @PROCEDIMIENTO + ')' )
GO

/*
EXEC LISTAR_CHECKLIST_PROC "'PR00000001', 'PR00000002'"
GO
*/

CREATE PROC UPDATE_PLAN_AUDITORIA
@PLAN CHAR(6),
@VERSION INT,
@FECHA SMALLDATETIME,
@ALCANCE VARCHAR(150),
@OBJETIVO VARCHAR(150),
@CODIGO_PROCESO CHAR(5)
AS	
		UPDATE TB_PLAN_AUDITORIA SET VERSION = @VERSION, FECHA = @FECHA, ALCANCE= @ALCANCE, OBJETIVO = @OBJETIVO,
		IDPROCESO = @CODIGO_PROCESO
		WHERE IDPLAN_AUDITORIA = @PLAN
GO

CREATE PROC UPDATE_DETALLE_PLAN_AUDITORIA
@CODIGO_PROC CHAR(10),
@CODIGO_CHECK CHAR(10),
@CODIGO_PLAN CHAR(6),
@ACC BIT
AS
	IF ( @ACC = 1 )
		BEGIN
			--IF NOT EXISTS(SELECT * FROM DETALLE_PLAN_AUDITORIA WHERE CODIGO_PROC = @CODIGO_PROC AND CODIGO_CHECK = @CODIGO_CHECK AND CODIGO_PLAN = @CODIGO_PLAN)
				INSERT INTO TB_DETALLE_PLAN_AUDITORIA(IDPROCEDIMIENTO, IDCHECKLIST, IDPLAN_AUDITORIA, VALOR_MEDIDO, FECHA_AUDITORIA) 
				VALUES (@CODIGO_PROC, @CODIGO_CHECK, @CODIGO_PLAN, 0, GETDATE())
		END
	ELSE
		DELETE FROM TB_DETALLE_PLAN_AUDITORIA 
		WHERE IDPROCEDIMIENTO = @CODIGO_PROC AND IDCHECKLIST = @CODIGO_CHECK AND IDPLAN_AUDITORIA = @CODIGO_PLAN
GO

CREATE PROC UPDATE_PLAN_PROCESO_AREA
@CODIGO_PROCESO CHAR(5), 
@CODIGO_AREA CHAR(4),
@CODIGO_PLAN CHAR(6),
@ACC BIT
AS
	IF ( @ACC = 1 )
		BEGIN
			INSERT INTO TB_PLAN_AREA VALUES (@CODIGO_PROCESO, @CODIGO_AREA, @CODIGO_PLAN)
		END
	ELSE
		DELETE FROM TB_PLAN_AREA 
		WHERE IDPROCESO = @CODIGO_PROCESO AND IDAREA = @CODIGO_AREA AND IDPLAN_AUDITORIA = @CODIGO_PLAN
GO

CREATE PROC GENERAR_PLAN_AUDITORIA
@CODIGO_PROCESO CHAR(5)
AS
	DECLARE @PLAN CHAR(6)
	SET @PLAN = (SELECT 'PL' + RIGHT('0000' + LTRIM(RIGHT(ISNULL(MAX(IDPLAN_AUDITORIA),'PL0000'), 4) + 1), 4) FROM TB_PLAN_AUDITORIA)
	INSERT INTO TB_PLAN_AUDITORIA VALUES(@PLAN, '1.0', GETDATE(), '', '', 0, @CODIGO_PROCESO)
	SELECT @PLAN
GO

CREATE PROC UPDATE_AUDITOR_LIDER
@PLAN CHAR(6),
@EMP CHAR(8)
AS
	UPDATE TB_PLAN_AUDITOR SET LIDER = 0 WHERE IDPLAN_AUDITORIA = @PLAN
	UPDATE TB_PLAN_AUDITOR SET LIDER = 1 WHERE IDPLAN_AUDITORIA = @PLAN AND IDEMPLEADO = @EMP
GO

--EXEC GENERAR_PLAN_AUDITORIA
--GO

CREATE PROC BUSCAR_CHECKLIST
@CADENA VARCHAR(100)
AS
	SELECT * FROM TB_CHECKLIST WHERE DESCRIPCION LIKE '%' + @CADENA + '%'
GO

EXEC BUSCAR_CHECKLIST '1'
GO

CREATE PROC UPDATE_CHECKLISTPROCEDIMIENTO
@CHECK CHAR(10),
@PROCEDIMIENTO CHAR(10),
@VALOR CHAR(30),
@ACC BIT
AS
	IF ( @ACC = 1 )
		BEGIN
			IF EXISTS ( SELECT * FROM TB_PROCEDIMIENTO_CHECKLIST WHERE IDCHECKLIST = @CHECK AND IDPROCEDIMIENTO = @PROCEDIMIENTO )
				UPDATE TB_PROCEDIMIENTO_CHECKLIST  SET VALOR_ESPERADO = @VALOR
				WHERE IDCHECKLIST = @CHECK AND IDPROCEDIMIENTO = @PROCEDIMIENTO 
			ELSE
				INSERT INTO TB_PROCEDIMIENTO_CHECKLIST VALUES (@PROCEDIMIENTO, @CHECK, @VALOR)
		END
	ELSE
		DELETE FROM TB_PROCEDIMIENTO_CHECKLIST WHERE IDCHECKLIST = @CHECK AND IDPROCEDIMIENTO = @PROCEDIMIENTO 
GO


/*
-----------------------------------------------------------------------------------------------
-- CARLOS
-----------------------------------------------------------------------------------------------
CREATE PROC REGISTRAR_INFORME_ADITORIA
(
	@CODIGO_PLAN CHAR(6)
	, @OBJETIVO VARCHAR(400)
	, @FECHA_INFORME DATE
	, @OBSERVACION VARCHAR(400)
	, @RECOMENDACION VARCHAR(400)
	, @SITUACION_INFORME CHAR(2)
)
AS
BEGIN	
	DECLARE @CODIGO_INFORME VARCHAR(6)	
	SET @CODIGO_INFORME = (SELECT 'IF' + RIGHT('000000' + CONVERT(VARCHAR(6),ISNULL(CONVERT(INT,MAX(RIGHT(CODIGO_INFORME,4))),0)+ 1),4)
							FROM INFORME_AUDITORIA)
		
	INSERT INTO INFORME_AUDITORIA
	(
		CODIGO_INFORME
		, CODIGO_PLAN
		, OBJETIVO
		, FECHA_INFORME
		, OBSERVACION
		, RECOMENDACION
		, SITUACION_INFORME
	)
	VALUES
	(
		@CODIGO_INFORME
		, @CODIGO_PLAN
		, @OBJETIVO
		, @FECHA_INFORME
		, @OBSERVACION
		, @RECOMENDACION
		, @SITUACION_INFORME
	)
	
END
GO

--DROP PROC LISTAR_INFORME_AUDITORIA
CREATE PROC LISTAR_INFORME_AUDITORIA
	@FECHA DATE = NULL
AS
BEGIN 
	SELECT 
			IA.CODIGO_INFORME
			, PA.CODIGO_PLAN
			, CONVERT(DATE,PA.FECHA) AS FECHA
	FROM INFORME_AUDITORIA IA INNER JOIN
			PLAN_AUDITORIA PA ON IA.CODIGO_PLAN = PA.CODIGO_PLAN
	WHERE (@FECHA IS NULL OR CONVERT(DATE,PA.FECHA) = @FECHA)
END;
GO
--
CREATE PROC OBTENER_INFORME_AUDITORIA
	@CODIGO_INFORME CHAR(6)
	, @CODIGO_PLAN CHAR(6)	
AS
BEGIN
	SELECT
			IA.CODIGO_INFORME
			, IA.CODIGO_PLAN
			, IA.OBJETIVO
			, IA.FECHA_INFORME
			, IA.OBSERVACION
			, IA.RECOMENDACION
			, IA.SITUACION_INFORME
			, PA.ALCANCE
			, CONVERT(DATE,PA.FECHA) AS FECHA
	FROM INFORME_AUDITORIA IA INNER JOIN
			PLAN_AUDITORIA PA ON IA.CODIGO_PLAN = PA.CODIGO_PLAN
	WHERE	IA.CODIGO_INFORME = @CODIGO_INFORME
			AND PA.CODIGO_PLAN =  @CODIGO_PLAN
END;
GO
--EXEC OBTENER_INFORME_AUDITORIA 'IF0001', 'PL0001'
CREATE PROC ELIMINAR_INFORME_AUDITORIA
	@CODIGO_INFORME CHAR(6)
AS
BEGIN
	DELETE FROM INFORME_AUDITORIA
	WHERE CODIGO_INFORME = @CODIGO_INFORME
END;
--EXEC ELIMINAR_INFORME_AUDITORIA 'IF0001'
GO
CREATE PROC ACTUALIZAR_INFORME_AUDITORIA
	@CODIGO_INFORME CHAR(6)
	, @CODIGO_PLAN CHAR(6)
	, @OBJETIVO VARCHAR(400)
	, @FECHA_INFORME DATE
	, @OBSERVACION VARCHAR(400)
	, @RECOMENDACION VARCHAR(400)
	, @SITUACION_INFORME CHAR(2)
AS
BEGIN
	UPDATE INFORME_AUDITORIA
		SET 
			CODIGO_PLAN = @CODIGO_PLAN
			, OBJETIVO = @OBJETIVO
			, FECHA_INFORME = @FECHA_INFORME
			, OBSERVACION = @OBSERVACION
			, RECOMENDACION = @RECOMENDACION
			, SITUACION_INFORME = @SITUACION_INFORME
	WHERE CODIGO_INFORME = @CODIGO_INFORME
END;
GO
--ACTUALIZAR_INFORME_AUDITORIA 'IF0002', 'PL0001', 'AAA', '2013-02-02', 'AAA', 'AAA', '01'
*/







